home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 February / WPCFEB97.ISO / dxrs / jukebx02.dxr / 00036_Control Loop.ls < prev    next >
Encoding:
Text File  |  1996-12-09  |  452 b   |  26 lines
  1. on exitFrame
  2.   global screen, JukeMode
  3.   repeat while JukeMode
  4.     case screen of
  5.       0:
  6.         buildIntroScreen()
  7.         set screen to 1
  8.       1:
  9.         hExit()
  10.       2:
  11.         BuildJukeBoxScreen()
  12.         bubbleVariables()
  13.         set screen to 3
  14.       3:
  15.         CheckInterfaceButtons()
  16.         BubbleAnimation()
  17.         hExit()
  18.       4:
  19.         BuildExitScreen()
  20.         set screen to 5
  21.       5:
  22.         hExit()
  23.     end case
  24.   end repeat
  25. end
  26.